calc_enorm Subroutine

public subroutine calc_enorm()

Uses

fst(j)=pnxlogjc04/pi4/vt3

Arguments

None